Ikonka dokumentu ze systemu

Otázka od: Gallina Lukas

22. 10. 2002 21:52

Ahoj.
Nevite nekdo jak ziskat od systemu ikonku dokumentu, kterou ma asociovanou?
Nemohu najit zadnou API ktera by mi to pomohla zaridit.
Diky.

D6 Personal, WinXP profi


S pozdravem
                    Lukas Gallina
                    lukas.gallina@programky.cz
                    www.programky.cz


Odpovedá: Petr Vones

22. 10. 2002 23:24

From: "Gallina Lukas" <Lukas.Gallina@programky.cz>
> Nevite nekdo jak ziskat od systemu ikonku dokumentu, kterou ma asociovanou?

Napriklad pomoci funkce GetFileNameIcon z JCL:
http://sourceforge.net/project/showfiles.php?group_id=47514&release_id=100652

uses
  JclShell;

procedure TForm1.Button1Click(Sender: TObject);
begin
  Image1.Picture.Icon.Handle := GetFileNameIcon('unit1.pas');
end;

Petr Vones